if ($msg eq 'add smod') {
  $self->{callback} = 'add smod';
  $self->{calluser} = $user; 
  $self->sendMessage("Who would you like to add as a Super Moderator? Type 'stop' to stop adding Super Moderators.");
}
else {
  # Check if we actually are adding a Moderator!
  if ($self->{callback} eq 'add smod') {
    # Check we are the user that wants to add a Moderator...
    if ($self->{calluser} eq $user) {
      if ($msg eq 'stop') {
        delete $self->{callback};
        delete $self->{calluser};
        $self->sendMessage("You have stopped adding Super Moderators.");
      }
      else {
        if (exists $users->{$msg}) {
          $users->{$msg}->{permissions} = 'smod';
          $self->sendMessage("$msg has been added as a Super Moderator. Type 'stop' to stop adding Super Moderators.");
        }
        else {
          $self->sendMessage("Sorry, there is no user registered called $msg.");
        }
      }
    }
  }
}